home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today - The Disc! 21 / cdromtoday-21.iso / mac / Multimedia Bird Book / PROFILE.DIR / 00212_Script_212 < prev    next >
Text File  |  1995-06-23  |  473b  |  23 lines
  1. on exitFrame
  2.   global soundCount,helpPhrases,goFrame
  3.   if soundBusy(1) then 
  4.     go "loop2first"
  5.   else
  6.     if (soundCount > (count(helpPhrases))) then
  7.       startTimer
  8.       cursor -1
  9.       go goFrame
  10.       puppetSprite 3,FALSE
  11.       puppetSprite 8,FALSE
  12.       puppetSprite 9,FALSE
  13.       puppetSprite 10,FALSE
  14.     else
  15.       startTimer
  16.       repeat while the timer < 20
  17.         --
  18.       end repeat
  19.       go "nextsound2first"
  20.     end if 
  21.   end if
  22. end
  23.